home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / doors_2 / twmac100.zip / TWMAC100.MAC next >
Text File  |  1992-08-10  |  7KB  |  105 lines
  1. {:nf7}{setv sct}{setv not}{inpu file,Use which Notepad file?}{inpu sct,Note on which sector?}{inpu not,Enter note now...}{wopen-a %file}{setv wrt,%sct% -> %not}{write %wrt}{write}{wclo %file}{}
  2. {:sf7}{rope %file,quit}{:loop2}{read nextline}{display ,,,%nextline%|^j}{goto loop2}{}
  3. {:quit}{}
  4. {:nf8}{setv mes}{:name}{inpu name,Message to whom?}{send c}{:mes}{inpu mes,Enter message now (60 character max)}{look Computer comm}{send s}{look Name) -}{send %name%|}{golo wname,Trader!}
  5. {look an %name%?}{send y}{send %mes%|}{look mission sent}{look er command}{send q}{}
  6. {:wname}{send q}{}
  7. ****END MARCIN****
  8.  
  9.  
  10.  ╔════════════════════════════════════════════════════════════════════════════╗ upproto
  11.  ║                                                                            ║
  12.  ║                          ┌──────────────────────┐                          ║
  13.  ║                          │ Upload Protocol Menu │                          ║ 
  14.  ║                          └──────────────────────┘                          ║
  15.  ║                                                                            ║
  16.  ║                                                                            ║
  17.  ║       IMPORTANT:  Be sure you have installed the indicated program         ║
  18.  ║                   before you try to use any external protocol.             ║
  19.  ║                                                                            ║
  20.  ║                   Zmodem batch            using DSZ.COM                    ║ {goto pzbs}{:pgu} {macro upproto}
  21.  ║                   Xmodem-1K  (old Ymodem)      Internal                    ║ {goto px1s} 
  22.  ║                   Xmodem                       Internal                    ║ {goto px2s}
  23.  ║                                                                            ║
  24.  ║                   Ymodem batch            using DSZ.COM                    ║ {goto pybs}
  25.  ║                   Ymodem-G batch          using DSZ.COM                    ║ {goto pygs}
  26.  ║                   MPt batch               using MPT.EXE                    ║ {goto pmps}
  27.  ║                   CompuServe B, B+     using OZBEXT.EXE                    ║ {goto pcbs}
  28.  ║                                                                            ║
  29.  ║                                                                            ║
  30.  ╚════════════════════════════════════════════════════════════════════════════╝
  31.  ╔════════════════════════════════════════════════════════════════════════════╗ dnproto
  32.  ║                                                                            ║
  33.  ║                         ┌────────────────────────┐                         ║
  34.  ║                         │ Download Protocol Menu │                         ║
  35.  ║                         └────────────────────────┘                         ║
  36.  ║                                                                            ║
  37.  ║                                                                            ║
  38.  ║       IMPORTANT:  Be sure you have installed the indicated program         ║
  39.  ║                   before you try to use any external protocol.             ║
  40.  ║                                                                            ║
  41.  ║                                                                            ║
  42.  ║                   Zmodem batch            using DSZ.COM                    ║ {goto pzbr} {:pgd} {macro dnproto}
  43.  ║                   Xmodem CRC  (or 1k/old Ymodem)  Internal                 ║ {goto px1r} 
  44.  ║                   Xmodem csum                     Internal                 ║ {goto px2r}
  45.  ║                                                                            ║
  46.  ║                   Ymodem batch            using DSZ.COM                    ║ {goto pybr}
  47.  ║                   Ymodem-G batch          using DSZ.COM                    ║ {goto pygr}
  48.  ║                   MPt batch               using MPT.EXE                    ║ {goto pmpr}
  49.  ║                   CompuServe B, B+     using OZBEXT.EXE                    ║ {goto pcbr}
  50.  ║                                                                            ║
  51.  ║                                                                            ║
  52.  ╚════════════════════════════════════════════════════════════════════════════╝
  53.  
  54.  Macros used for DOWNLOADING (receiving)                      Program required
  55.  ─────────────────────────────────────────────────────────────────────────────
  56.  X CRC     {:px1r} {call gfnd} {rxmo %file} {}
  57.  X csum    {:px2r} {call gfnd} {rxmo-c0 %file} {}
  58.  
  59.  Z batch   {:zmodem} {:pzbr} {exec DSZ port %_por rz -mr %dldir} {}    DSZ.COM
  60.  Y batch   {:pybr}   {exec DSZ port %_por rb %dldir\} {}               DSZ.COM
  61.  Y-G       {:pygr}   {exec DSZ port %_por rb -g %dldir\} {}            DSZ.COM
  62.  
  63.  MPt  {:mpt} {:pmpr} {exec MPT P%_por S%_spe r %dldir\} {}             MPT.EXE
  64.  CIS BPlus   {:pcbr} {exec OZBEXT /c%_por /f%dldir /n} {}           OZBEXT.EXE
  65.  
  66.  {:gfnd} {setv file,%dldir\} {input file,Enter a filename to DOWNLOAD}
  67.          {ifex %file,,gf_y} {input %yn,File exists, overwrite? [Y/n]}
  68.          {comp yn} {ifco gf_y} {comp yn,y} {ifco gf_y} {}
  69.          {:gf_y} {return}
  70.  
  71.  Macros used for UPLOADING (sending)                          Program required
  72.  ─────────────────────────────────────────────────────────────────────────────
  73.  
  74.  X-1K     {:px1s} {call gfnu} {sxmo-k %file} {}
  75.  X        {:px2s} {call gfnu} {sxmo %file} {}
  76.  
  77.  Z batch  {:pzbs} {call gfnu} {exec DSZ port %_por sz -mr %file} {}    DSZ.COM
  78.  Y batch  {:pybs} {call gfnu} {exec DSZ port %_por sb -k %file} {}     DSZ.COM
  79.  Y-G      {:pygs} {call gfnu} {exec DSZ port %_por sb -g -k %file} {}  DSZ.COM
  80.  
  81.  MPt   {:pmps} {call gfnu} {exec MPT P%_por S%_spe s %file} {}         MPT.EXE
  82.  CIS BPlus     {:pcbs}    {exec OZBEXT /c%_por /f%uldir /n} {}      OZBEXT.EXE
  83.  
  84.  {:gfnu} {setv file,%uldir\} {input file,Enter a filename to UPLOAD} {return}
  85.  
  86.  
  87.   Macro                   Key             Function
  88.   ────────────────────────────────────────────────────────────────────────────
  89.   {:hom} {send ^W} {}     Home            Start of line
  90.   {:end} {send ^P} {}     End             End of line
  91.   {:pgu} {send ^R} {}     PgUp            Page up
  92.   {:pgd} {send ^C} {}     PgDn            Page down
  93.  
  94.   {:upa} {send ^E} {}     Up Arrow        Cursor up
  95.   {:dna} {send ^X} {}     Down Arrow      Cursor down
  96.   {:lfa} {send ^S} {}     Left Arrow      Cursor left
  97.   {:rta} {send ^D} {}     Right Arrow     Cursor right
  98.  
  99.   {:cla} {send ^A} {}     ^Left Arrow     Word left
  100.   {:cra} {send ^F} {}     ^Right Arrow    Word right
  101.  
  102.   {:ins} {send ^V} {}     Insert          Toggle insert mode
  103.   {:del} {send ^G} {}     Delete          Delete character
  104.   {:cnd} {send ^K} {}     ^End            Delete to end of line
  105.